set fs = CreateObject("Scripting.FileSystemObject")
set f = fs.CreateTextFile(sFileName, True)
f.WriteLine(sText)
